procedure Test;
require
	True : 'Invalid string'(;
begin
end;